#lang rosetta-racket


(require "shelter.rkt")

(provide shelter-example)


(define (shelter-example)
  (view
   (xyz -19.58261897714489 -141.55421556224059 36.09156231323101)
   (xyz 12.324284669184332 51.25177851739088 9.744397962615519)
   (perspective 35)
   (shelter 100.0 50.0 50.0 18 1 9 47.2)))